function [E] = fcn_E_q_fwd(eff)

E = zeros(5,5);

  E(1,1)=1;
  E(1,2)=0;
  E(1,3)=0;
  E(1,4)=0;
  E(1,5)=0;
  E(2,1)=0;
  E(2,2)=1;
  E(2,3)=0;
  E(2,4)=0;
  E(2,5)=0;
  E(3,1)=0;
  E(3,2)=0;
  E(3,3)=1;
  E(3,4)=0;
  E(3,5)=0;
  E(4,1)=0;
  E(4,2)=0;
  E(4,3)=0;
  E(4,4)=eff(3);
  E(4,5)=0;
  E(5,1)=0;
  E(5,2)=0;
  E(5,3)=0;
  E(5,4)=0;
  E(5,5)=eff(4);

 